home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 016a / bingo2.zip / BING_MNU.SC < prev    next >
Text File  |  1991-09-16  |  1KB  |  26 lines
  1. CLEAR
  2.   SHOWMENU
  3.     "≡BINGO≡" : " Use ─ ─ to Move, Press ──┘ to SELECT Options",
  4.     "Compare": "Look at BOTH table structures in their ENTIRETY",
  5.     "Differences" : "Just look at the DIFFERENCES between both table structures",
  6.     "PrintComp": "Print the COMPARE report",
  7.     "JustDiff": "Print only the DIFFERENCES report",
  8.     "RESTRUCTURE": "Restructure the offending li'l beastie",
  9.     "QUIT": "Return to PARADOX"
  10.     DEFAULT "Compare"
  11.     TO invar
  12.   SWITCH
  13.     CASE invar = "≡BINGO≡"                             : CLEARALL MENU RETURN
  14.     CASE invar = "Compare"                             : PLAY "Bing_com"
  15.     CASE invar = "Differences"                         : PLAY "Bing_dif"
  16.     CASE invar = "PrintComp"                           : PLAY "Bing_prn"
  17.     CASE invar = "JustDiff"                            : PLAY "Bing_rpt"
  18.     CASE invar = "RESTRUCTURE"                         : PLAY "Bing_res"
  19.     CASE invar = "RETURN"                              : QUIT
  20.   ENDSWITCH
  21.   RELEASE VARS ALL
  22. ClearALL
  23. QUIT
  24.  
  25.  
  26.